/* secuencias */
CREATE SEQUENCE IDLocal            INCREMENT BY 1 START WITH 1
/
CREATE SEQUENCE IDCategoria            INCREMENT BY 1 START WITH 1
/
CREATE SEQUENCE IDProducto            INCREMENT BY 1 START WITH 1
/
CREATE SEQUENCE IDPresentacion            INCREMENT BY 1 START WITH 1
/

/* Procedimientos de insercion */

create or replace procedure agregarLocal (nombre in VARCHAR2, calle in VARCHAR2, sector in VARCHAR2, referencia in VARCHAR2, fklugar in NUMBER) is
begin
 insert into LOCAL_USR values (IDLocal.NEXTVAL,nombre,DIRECCION(calle, sector, referencia),fklugar);
end;
/

create or replace procedure agregarCategoria (nombre in VARCHAR2, descripcion in VARCHAR2) is
begin
	insert into CATEGORIA values (IDCategoria.NEXTVAL, nombre, descripcion);
end;
/

create or replace procedure agergarProducto (nombre in VARCHAR2, fkcategoria in NUMBER) is
begin
	insert into PRODUCTO values (IDProducto.NEXTVAL, nombre,fkcategoria);
end;
/

create or replace procedure agregarPresentacion (nombre in VARCHAR2, contenidoNeto in NUMBER, unidad in VARCHAR2, fkproducto in NUMBER) is
begin
	insert into PRESENTACION values (IDPresentacion.NEXTVAL, nombre, contenidoNeto, unidad, fkproducto);
end;
/

create or replace procedure agregarCompras (codigo in NUMBER, fecha1 in DATE, total in NUMBER, iva in NUMBER, fklocal in NUMBER) is
Begin
	insert into COMPRA values (codigo,fecha1,total,fklocal,null,iva);
end;
/


	